!ifndef reg
	$dialog message text "Не задана область"
!else
        $dialog save filter "*.STL файлы|*.stl|*.OBJ файлы|*.obj|Все файлы|*.*" title "Сохранить выделенную область в stl/obj файл" ext "stl"
	!path = path
	!ifdef path
                $draw pid !reg dinfo off // выводим область и epsg
                !vx  = vx_ll
                !ifdef vx
                        $dialog select title "Размер ребра выходного треугольника поверхности" text "Авто<0>|1 м<1>|5 м<5>|10 м<10>|20 м<20>|30 м<30>|50 м<50>"
                        !es=select
                        !ifdef es
                        	$dialog select title "Состав" text "Все объекты<srhmp>|Поверхность ,Модели<sm>|Модели<m>|Поверхность<s>"
                                !tt=select
                        	!ifdef tt
                                $stl region !vx edgesize !es file !path binary types !tt
                        	!delete tt
				!endif
                        !delete es
			!endif

		!delete vx
		!endif
		$draw pid !reg on      // включаем выделенную область обратно
	!delete path
	!endif
!endif
